Procedure NewHeading(NewHead:String;NewMode:TextFormats;
                         Forg,Back:Byte)

    This creates a new heading and displays it.

    Specify  the  string  to  display,  how  it  is  to be displayed, the
    foreground colour and the background colour.

    TextFormats is defined in Strings.